Windows News 2005 November/WNnov2005.iso/Windows/Indispensables/Movie Collection/MovieCollection5403.exe/{app}/MovieCollection.exe/0/RCDATA/TFRMTIERS/TFRMTIERS.txt

Text File | 2005-08-08 | 12KB | 451 lines

inherited FrmTiers: TFrmTiers
  Left = 326
  Top = 274
  VertScrollBar.Range = 0
  BorderStyle = bsDialog
  Caption = 'FrmTiers'
  ClientHeight = 523
  ClientWidth = 547
  OldCreateOrder = True
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  inherited sb: TTBXStatusBar
    Top = 504
    Width = 547
  end
  object dxLayoutControl1: TdxLayoutControl [1]
    Left = 0
    Top = 0
    Width = 547
    Height = 478
    Align = alClient
    ParentBackground = True
    TabOrder = 1
    LookAndFeel = dtmSession.dxLayoutWebLookAndFeel
    object cxEdNom: TcxDBTextEdit
      Left = 124
      Top = 62
      Width = 160
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 1
    end
    object cxEdPrenom: TcxDBTextEdit
      Left = 124
      Top = 89
      Width = 160
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 2
    end
    object cxEdTelephone: TcxDBTextEdit
      Left = 124
      Top = 143
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 4
    end
    object cxEdAdresse1: TcxDBTextEdit
      Left = 124
      Top = 202
      Width = 100
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 8
    end
    object cxEdAdresse2: TcxDBTextEdit
      Left = 124
      Top = 229
      Width = 300
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 9
    end
    object cxEdZip: TcxDBTextEdit
      Left = 124
      Top = 256
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 10
    end
    object cxEdVille: TcxDBTextEdit
      Left = 275
      Top = 256
      Width = 120
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 11
    end
    object cxEdPortable: TcxDBTextEdit
      Left = 124
      Top = 116
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 3
    end
    object cxEdPays: TcxDBTextEdit
      Left = 124
      Top = 283
      Width = 200
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ReadOnly = False
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 12
    end
    object cxEdMail: TcxDBHyperLinkEdit
      Left = 124
      Top = 342
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 13
    end
    object cxEdObs: TcxDBMemo
      Left = 21
      Top = 369
      Width = 185
      Height = 89
      DataBinding.DataSource = dsFiche
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 14
    end
    object cxEdUtilisateur: TcxDBTextEdit
      Left = 403
      Top = 62
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 6
    end
    object cxChkAcces: TcxDBCheckBox
      Left = 403
      Top = 35
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.ValueChecked = '1'
      Properties.ValueUnchecked = '0'
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 5
    end
    object cxEdPassword: TcxDBTextEdit
      Left = 403
      Top = 89
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Properties.EchoMode = eemPassword
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 7
    end
    object cxEdMatricule: TcxDBTextEdit
      Left = 124
      Top = 35
      Width = 121
      Height = 21
      DataBinding.DataSource = dsFiche
      Style.BorderColor = clHighlight
      Style.BorderStyle = ebsSingle
      Style.HotTrack = False
      TabOrder = 0
    end
    object dxLayoutControl1Group_Root: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutControl1Group1: TdxLayoutGroup
        ShowCaption = False
        Hidden = True
        LayoutDirection = ldHorizontal
        ShowBorder = False
        object layEmprunteur: TdxLayoutGroup
          Caption = 'Emprunteur'
          object dxLayoutControl1Item1: TdxLayoutItem
            Caption = 'Matricule'
            Control = cxEdMatricule
            ControlOptions.ShowBorder = False
          end
          object itemNom: TdxLayoutItem
            Caption = 'Nom'
            Control = cxEdNom
            ControlOptions.ShowBorder = False
          end
          object itemPrenom: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'Prenom'
            Control = cxEdPrenom
            ControlOptions.ShowBorder = False
          end
          object itemPortable: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'Portable'
            Control = cxEdPortable
            ControlOptions.ShowBorder = False
          end
          object itemTel: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'T'#233'l'#233'phone'
            Control = cxEdTelephone
            ControlOptions.ShowBorder = False
          end
        end
        object layAccesInternet: TdxLayoutGroup
          Caption = 'Acc'#232's Internet'
          object itemAccesWeb: TdxLayoutItem
            Caption = 'Autoriser l'#39'acc'#232's ?'
            Control = cxChkAcces
            ControlOptions.ShowBorder = False
          end
          object itemUser: TdxLayoutItem
            Caption = 'Utilisateur'
            Control = cxEdUtilisateur
            ControlOptions.ShowBorder = False
          end
          object itemPass: TdxLayoutItem
            Caption = 'Mot de passe'
            Control = cxEdPassword
            ControlOptions.ShowBorder = False
          end
        end
      end
      object layAdresse: TdxLayoutGroup
        Caption = 'Adresse'
        object itemAdresse: TdxLayoutItem
          Caption = 'Adresse'
          Control = cxEdAdresse1
          ControlOptions.ShowBorder = False
        end
        object itemComplemAdresse: TdxLayoutItem
          Caption = 'Compl'#233'ment adresse'
          Control = cxEdAdresse2
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Group4: TdxLayoutGroup
          ShowCaption = False
          Hidden = True
          ShowBorder = False
          object dxLayoutControl1Group3: TdxLayoutGroup
            ShowCaption = False
            Hidden = True
            LayoutDirection = ldHorizontal
            ShowBorder = False
            object itemZip: TdxLayoutItem
              Caption = 'Code postal'
              Control = cxEdZip
              ControlOptions.ShowBorder = False
            end
            object itemVille: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Ville'
              Control = cxEdVille
              ControlOptions.ShowBorder = False
            end
          end
          object itemPays: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'Pays'
            Control = cxEdPays
            ControlOptions.ShowBorder = False
          end
        end
      end
      object layInformations: TdxLayoutGroup
        Caption = 'Informations compl'#233'mentaires'
        object itemMail: TdxLayoutItem
          Caption = 'Email'
          Control = cxEdMail
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item5: TdxLayoutItem
          CaptionOptions.Layout = clTop
          Control = cxEdObs
          ControlOptions.ShowBorder = False
        end
      end
    end
  end
  object TBXDock1: TTBXDock [2]
    Left = 0
    Top = 478
    Width = 547
    Height = 26
    Position = dpBottom
    object TBToolbar1: TTBXToolbar
      Left = 0
      Top = 0
      Align = alBottom
      BorderStyle = bsNone
      Caption = 'TBToolbar'
      DockMode = dmCannotFloatOrChangeDocks
      DockPos = 152
      DragHandleStyle = dhNone
      FullSize = True
      Images = ImageListSmall
      TabOrder = 0
      object TBItem1: TTBXItem
        Action = ActionFermer
        DisplayMode = nbdmImageAndText
      end
      object TBSeparatorItem: TTBXSeparatorItem
      end
      object TBItem3: TTBXItem
        Action = ActionValider
        DisplayMode = nbdmImageAndText
      end
      object TBItem2: TTBXItem
        Action = ActionCancel
        DisplayMode = nbdmImageAndText
      end
    end
  end
  inherited aclFiche: TActionList
    Left = 336
    Top = 168
  end
  inherited ImageListSmall: TImageList
    Left = 272
    Top = 144
  end
  object qryFiche: TIBQuery
    Database = dtmSession.IBDatabase
    OnNewRecord = qryFicheNewRecord
    OnPostError = qryFichePostError
    BufferChunks = 1000
    CachedUpdates = False
    UpdateObject = IBUpdateSQL
    Left = 216
    Top = 144
  end
  object IBUpdateSQL: TIBUpdateSQL
    Left = 360
    Top = 168
  end
  object dsFiche: TDataSource
    DataSet = qryFiche
    Left = 272
    Top = 160
  end
  object ActionManager: TActionManager
    ActionBars = <
      item
        Items = <
          item
            Action = ActionValider
            ImageIndex = 1
          end
          item
            Action = ActionCancel
            ImageIndex = 0
          end>
      end
      item
        Items = <
          item
            Action = ActionValider
            ImageIndex = 1
          end
          item
            Action = ActionCancel
            ImageIndex = 0
          end>
      end
      item
        Items = <
          item
            Action = ActionValider
            ImageIndex = 1
          end
          item
            Action = ActionCancel
            ImageIndex = 0
          end
          item
            Caption = '-'
          end>
      end
      item
        Items = <
          item
            Action = ActionValider
            ImageIndex = 1
          end
          item
            Action = ActionCancel
            ImageIndex = 0
          end>
      end>
    Images = ImageListSmall
    Left = 320
    Top = 168
    StyleName = 'XP Style'
    object ActionValider: TAction
      Caption = '&Valider'
      ImageIndex = 1
      OnExecute = ActionValiderExecute
    end
    object ActionCancel: TAction
      Caption = '&Abandonner'
      ImageIndex = 0
      OnExecute = ActionCancelExecute
    end
    object ActionFermer: TAction
      Caption = 'Fermer'
      ImageIndex = 16
      OnExecute = ActionFermerExecute
    end
  end
end